home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / cmln0885.arc / EXPERT1.LTG < prev    next >
Text File  |  1986-02-27  |  640b  |  21 lines
  1. Expert systems part II Listing 1
  2.  
  3. Rule sheet
  4.  
  5. S  Rule
  6. -  ----
  7.  
  8. *  Ts = Te * sqrt(1 - v^2/c^2)
  9.  
  10. ---------------------------------------------------------------
  11.  
  12. Variable sheet
  13.  
  14. St  Input      Name     Output  Unit    Comment
  15. --  -----      ----     -----   ----    -------
  16.  
  17. L              Te               yr      time on earth
  18.     10         Ts               yr      time in the spaceship
  19. L    0         v                m/s     spaceship velocity
  20.     299790000  c                m/s     velocity of light
  21.